home *** CD-ROM | disk | FTP | other *** search
- object OneAdressForm: TOneAdressForm
- Left = 518
- Top = 316
- HelpContext = 1360
- BorderIcons = [biMaximize]
- BorderStyle = bsSingle
- Caption = 'Address entry'
- ClientHeight = 260
- ClientWidth = 429
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- Position = poScreenCenter
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TTntLabel
- Left = 12
- Top = 20
- Width = 31
- Height = 13
- Caption = '&Name:'
- FocusControl = Nameedit
- end
- object Label2: TTntLabel
- Left = 300
- Top = 16
- Width = 21
- Height = 13
- Caption = '&Key:'
- FocusControl = Keyedit
- end
- object Label3: TTntLabel
- Left = 12
- Top = 68
- Width = 47
- Height = 13
- Caption = 'C&ompany:'
- FocusControl = companyedit
- end
- object Label4: TTntLabel
- Left = 12
- Top = 92
- Width = 72
- Height = 13
- Caption = '&Postal address:'
- FocusControl = postaledit
- end
- object Label5: TTntLabel
- Left = 12
- Top = 116
- Width = 71
- Height = 13
- Caption = '&Street address:'
- FocusControl = streetedit
- end
- object Label6: TTntLabel
- Left = 12
- Top = 140
- Width = 34
- Height = 13
- Caption = 'P&hone:'
- FocusControl = phoneedit
- end
- object Label7: TTntLabel
- Left = 12
- Top = 164
- Width = 20
- Height = 13
- Caption = '&Fax:'
- FocusControl = faxedit
- end
- object Label8: TTntLabel
- Left = 12
- Top = 44
- Width = 28
- Height = 13
- Caption = '&Email:'
- FocusControl = emailedit
- end
- object Label9: TTntLabel
- Left = 12
- Top = 212
- Width = 31
- Height = 13
- Caption = '&Notes:'
- FocusControl = NotesMemo
- end
- object Label10: TTntLabel
- Left = 12
- Top = 188
- Width = 37
- Height = 13
- Caption = '&X-Face:'
- FocusControl = xfaceedit
- end
- object Bevel1: TBevel
- Left = 363
- Top = 152
- Width = 50
- Height = 50
- end
- object XFaceImage: TImage
- Left = 364
- Top = 153
- Width = 48
- Height = 48
- Transparent = True
- end
- object Button1: TMMTNTBItBtn
- Left = 292
- Top = 232
- Width = 59
- Height = 25
- Caption = '&OK'
- Default = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBtnText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ModalResult = 1
- ParentFont = False
- TabOrder = 10
- end
- object Button2: TMMTNTBItBtn
- Left = 360
- Top = 232
- Width = 65
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clBtnText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ModalResult = 2
- ParentFont = False
- TabOrder = 11
- end
- object Keyedit: TTntEdit
- Left = 344
- Top = 12
- Width = 69
- Height = 21
- TabOrder = 1
- end
- object emailedit: TTntEdit
- Left = 108
- Top = 36
- Width = 172
- Height = 21
- TabOrder = 2
- end
- object xfaceedit: TTntEdit
- Left = 108
- Top = 180
- Width = 172
- Height = 21
- TabOrder = 8
- OnChange = xfaceeditChange
- end
- object Nameedit: TTntEdit
- Left = 108
- Top = 12
- Width = 172
- Height = 23
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Arial Unicode MS'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- end
- object companyedit: TTntEdit
- Left = 108
- Top = 60
- Width = 172
- Height = 23
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Arial Unicode MS'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- end
- object postaledit: TTntEdit
- Left = 108
- Top = 84
- Width = 305
- Height = 23
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Arial Unicode MS'
- Font.Style = []
- ParentFont = False
- TabOrder = 4
- end
- object streetedit: TTntEdit
- Left = 108
- Top = 108
- Width = 305
- Height = 23
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Arial Unicode MS'
- Font.Style = []
- ParentFont = False
- TabOrder = 5
- end
- object phoneedit: TTntEdit
- Left = 108
- Top = 132
- Width = 172
- Height = 23
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Arial Unicode MS'
- Font.Style = []
- ParentFont = False
- TabOrder = 6
- end
- object faxedit: TTntEdit
- Left = 108
- Top = 156
- Width = 172
- Height = 23
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Arial Unicode MS'
- Font.Style = []
- ParentFont = False
- TabOrder = 7
- end
- object NotesMemo: TPlusMemoU
- Left = 108
- Top = 212
- Width = 172
- Height = 45
- Cursor = crIBeam
- Alignment = taLeftJustify
- ScrollBars = ssVertical
- AltFont.Charset = DEFAULT_CHARSET
- AltFont.Color = clWindowText
- AltFont.Height = -11
- AltFont.Name = 'MS Sans Serif'
- AltFont.Style = []
- CaretWidth = 1
- ColumnWrap = 0
- DisplayOnly = False
- EnableHotKeys = False
- EndOfTextMark.Color = clRed
- EndOfTextMark.Style = psClear
- Justified = False
- LineHeight = 0
- Options = [pmoWrapCaret, pmoInsertKeyActive, pmoWideOverwriteCaret, pmoAutoScrollBars]
- Overwrite = False
- RightLinePen.Color = clGray
- RightLinePen.Style = psDot
- ScrollTime = 0
- SelBackColor = clHighlight
- SelTextColor = clHighlightText
- Separators = #9#10#13' $%&,./:;<=>'
- SpecUnderline.Color = clRed
- UpdateMode = umImmediate
- Version = 'v6.2h Professional ed.'
- Ctl3D = True
- ParentCtl3D = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'Arial Unicode MS'
- Font.Style = []
- ParentFont = False
- TabOrder = 9
- TabStop = True
- OnKeyDown = NotesMemoKeyDown
- end
- end
-